home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
programr
/
mathstud.zip
/
ANGLE.M
< prev
next >
Wrap
Text File
|
1993-03-10
|
224b
|
10 lines
function y = angle(expr)
% y=angle(x)
% x - input argument (usually complex)
% y - phase angle, in radians, of x
if (nargin ~= 1)
error('angle() takes only one argument')
end
y = atan2(imag(expr), real(expr));